home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / Czarina.dxr / Internal_8_waste cards.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  1.8 KB  |  56 lines
  1. property spriteNum
  2. global waste, mover, points, equal, currentsel, godlist
  3.  
  4. on mouseDown me
  5.   if waste.cards.count > 0 then
  6.     puppetSound(3, member("pick card", "100GPak Generic SFX"))
  7.     sprite(spriteNum).locZ = spriteNum + 2000
  8.     mover = timeout("Het").new(1, #moveme, me)
  9.     if waste.getcardcount() > 1 then
  10.       sprite(spriteNum - 1).member = member(waste.cards[waste.getcardcount() - 1].membername, "playing cards")
  11.     else
  12.       sprite(spriteNum - 1).member = member("empty", "playing cards")
  13.     end if
  14.   end if
  15. end
  16.  
  17. on moveme me
  18.   sprite(spriteNum).loc = the mouseLoc
  19.   if the stillDown = 0 then
  20.     mover.forget()
  21.     sprite(spriteNum).loc = waste.getlastcard().location
  22.     sprite(spriteNum).locZ = spriteNum
  23.   end if
  24. end
  25.  
  26. on mouseUp me
  27.   if waste.getcardcount() > 0 then
  28.     if equal then
  29.       puppetSound(3, member("pick card", "100GPak Generic SFX"))
  30.       sprite(spriteNum).loc = waste.getlastcard().location
  31.       sprite(spriteNum).locZ = spriteNum
  32.       sprite(currentsel).member = sprite(spriteNum).member
  33.       godlist.addCard(currentsel)
  34.       waste.cards.deleteAt(waste.getcardcount())
  35.       if waste.getcardcount() > 0 then
  36.         sprite(spriteNum).member = member(waste.getlastcard().membername, "playing cards")
  37.       else
  38.         sprite(spriteNum).member = member("empty", "playing cards")
  39.         sprite(spriteNum - 1).member = member("empty", "playing cards")
  40.       end if
  41.       if (currentsel >= 25) and (currentsel <= 28) then
  42.         points = points + 10
  43.         checkwin()
  44.       end if
  45.       checkwin()
  46.       equal = 0
  47.       currentsel = 0
  48.       godlist = VOID
  49.     else
  50.       puppetSound(3, member("drop card", "100GPak Generic SFX"))
  51.       sprite(spriteNum).loc = waste.getlastcard().location
  52.       sprite(spriteNum).locZ = spriteNum
  53.     end if
  54.   end if
  55. end
  56.